COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	TITLE SIX
C00003 ENDMK
C⊗;
TITLE SIX

REV1:	0
	TRCE 41↔TRCE 41↔TRCE 41
	TRCE 22↔TRCE 22↔TRCE 22
	TRCE 14↔TRCE 14↔TRCE 14
	JRST @REV1

REV2:	0
	IMUL [2004010]
	AND [110044220]
	IDIVI 77
	MOVE 1
	ANDI 77
	JRST @REV2

SA:	MOVEI 10,77
	MOVE 0,10↔JSR REV1↔MOVEM 0,7
	MOVE 0,10↔JSR REV2
	CAME 0,7
FUCK:	JFCL
	SOJGE 10,SA+1
EOL:	HALT
END SA